home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / sys / amiga / networking / 1117 < prev    next >
Encoding:
Internet Message Format  |  1996-08-05  |  6.5 KB
  1. Path: shellx.best.com!usenet
  2. From: Remi Lenoir <remi@dvsystems.com>
  3. Newsgroups: comp.sys.amiga.networking
  4. Subject: Re: trying to kludge an lp
  5. Date: Sun, 04 Feb 1996 21:38:03 -0800
  6. Organization: Digital Video Systems
  7. Message-ID: <311597BB.3019@dvsystems.com>
  8. References: <DM2sBF.9su@muse.calarts.edu> <31122BFD.2030@gbar.dtu.dk> <19960204.73EFD40.9B22@ragtime.vnet.net>
  9. NNTP-Posting-Host: pepper.vip.best.com
  10. Mime-Version: 1.0
  11. Content-Type: text/plain; charset=us-ascii
  12. Content-Transfer-Encoding: 7bit
  13. X-Mailer: Mozilla 2.0b6a (Win95; I)
  14.  
  15. John Kelly wrote:
  16. > 
  17. >  Rask Ingemann Lambertsen <gc948374@gbar.dtu.dk> writes:
  18. > 
  19. > > >         The best thing I can think of is to intercept stuff on it's way
  20. > > > to PRT: and remote copy (rcp) it to the prt: device of the node that has
  21. > > > the printer.  Is there a way to do this?  anyone have better ideas?
  22. > >
  23. > > Try the CMD command that comes with your WB, it can intercept output to
  24. > > serial or parallel devices and redirect it to a file.
  25. > 
  26. >  Or lpd.lha, which is a line printer daemon for AmiTCP, and does exactly
  27. >  what he wants.
  28. > 
  29. >   comm/tcp/   on any Aminet site.
  30.  
  31. This will be the first step: make the printer available to the network. But then, how to
  32. *transparently* print from the Amiga applications ?
  33.  
  34. To my knowledge there is no DOS handler or device driver to print with AmiTCP or AS225.
  35. It would be nice to have a NETPRT: device to which we could copy files. It would also be
  36. nice to have a PRT:/printer.device redirector to NETPRT: as well as one that would allow
  37. the files to be automatically processed -by a user specified program- just before they 
  38. get sent to the network (processed by 'a2p' for example...).
  39.  
  40. I personaly do not have the first problem as on our network the printer is made available
  41. by the server (SUN station). But, as john suggests, you could try lpd.lha to make the
  42. printer available to your network.
  43.  
  44. As for the second problem, I wrote an AREXX script for Final Writer that do the following:
  45.     1 - Captures the data sent by FW using CMD.
  46.     2 - Copy the data to the my account on the SUN server (accessible through NFS).
  47.     3 - Issue a "lpr" on the SUN ("rsh lpr filename")
  48.     4 - Delete the file from my account on the SUN.
  49.  
  50. It works ok but is not perfect because of bugs/limitations in FW1's AREXX interface.
  51.  
  52. Also, there is a lpr client that I use when printing text/postscript files from the SHELL.
  53. It is called port-lpr and is available on Aminet in comm/tcp as port-lpr.lha.
  54.  
  55. I have included the two AREXX scripts. Feel free to modify them to suit your needs.
  56. The two scripts are called from the user menu in FW. "NetPrint" print all the pages from
  57. the current section one by one. "NetPrint.All" attemps to print all the pages from all
  58. the sections but it doesn't work if I remember correctly (I didn't use those scripts for
  59. sometime).
  60.  
  61. Regards,
  62.  
  63.  -Remi.
  64.  
  65.  
  66. ----------------------------------- NetPrint ----------------------------------------
  67.  
  68. /***************************************************************/
  69. /*                                                             */
  70. /*                        BigNetPrint                          */
  71. /*                                                             */
  72. /* A FinalWriter Arexx macro to print on a NetWorked Printer   */
  73. /*                                                             */
  74. /* It uses the CMD program (SYS:Tools/CMD) to redirect the     */
  75. /* output to RAM:, then copy the file to the networked server  */
  76. /* and ask the server to print it.                             */
  77. /*                                                             */
  78. /* This is a modified version of NetPrint. The difference is   */
  79. /* that large document are printed page by page in order to    */
  80. /* keep the output files size in a reasonable proportion.      */
  81. /* Large files are a problem for at least two reasons:         */
  82. /*   - Use a lot of RAM or Disk space                          */
  83. /*   - Will cause you trouble with Unix spooler that will not  */
  84. /*     want to duplicate the file in its spool area because    */
  85. /*     it is too big (you'll have to ask him to use directly   */
  86. /*     the file on your account)                               */
  87. /* As a consequence, this method parallelizes the printing     */
  88. /* process (While FinalWriter outputs a page, the printer      */
  89. /* server prints a previous one) thus speeding the printing.   */
  90. /*                                                             */
  91. /* Author: Remi Lenoir                                         */
  92. /* Created: June 20, 1994                                      */
  93. /*                                                             */
  94. /***************************************************************/
  95.  
  96. OPTIONS results
  97.  
  98. /* These lines left just as examples */
  99. /*
  100. toto=4
  101. i=5
  102. PRINTSETUP Pages range frompage i topage i
  103. SHOWMESSAGE 1 1 '"toto = 'toto'" "" "" "OK" "" ""'
  104. EXIT
  105. */
  106.  
  107. /* Print the document page by page */
  108. STATUS Pages
  109. NbrPage=result
  110. DO i=1 TO NbrPage
  111.  
  112.   /*
  113.     Start 'CMD'.
  114.     If it is already running then we can not print because we need to choose
  115.     the output file name as we have to use copy it to the network.
  116.   */
  117.   IF SHOW(ports,'cas_TMP_CMD_PORT') THEN DO
  118.     SHOWMESSAGE 1 1 '"CMD already running, Can not print!" "" "" "OK" "" ""'
  119.     EXIT 5
  120.   END
  121.   ADDRESS COMMAND 'Run SYS:Tools/CMD parallel RAM:FinalWriter.prt'
  122.   ADDRESS COMMAND 'SYS:rexxc/WaitForPort cas_TMP_CMD_PORT'
  123.   IF (rc = 5) THEN DO
  124.     SHOWMESSAGE 1 1 '"Can t start SYS:Tools/CMD !" "" "" "OK" "" ""'
  125.     EXIT 5
  126.   END
  127.  
  128.   /*
  129.     Tell FinalWriter we want to print in range mode
  130.   */
  131.   PRINTSETUP Pages range frompage i topage i
  132.  
  133.   /*
  134.     Print page i
  135.   */
  136.   PRINT
  137.  
  138.   /*
  139.     Copy the file to my SparcStation account
  140.   */
  141.   ADDRESS COMMAND 'Copy RAM:FinalWriter.prt Sparc:'
  142.  
  143.   /*
  144.     Delete the file from RAM:
  145.   */
  146.   ADDRESS COMMAND 'Delete RAM:FinalWriter.prt'
  147.  
  148.   /*
  149.     Ask the SparcStation to print the file
  150.   */
  151.   ADDRESS COMMAND 'rsh dvs lpr -h FinalWriter.prt'
  152.  
  153.   /*
  154.     Delete the file from my account
  155.     (We can delete the file safely as Unix made a copy in its spool area)
  156.     Note: if the file is too big, Unix will NOT make a copy and will print
  157.           it directly. I do not handle that case, shame on me.
  158.   */
  159.   ADDRESS COMMAND 'Delete Sparc:FinalWriter.prt'
  160.  
  161. END
  162.  
  163.  
  164. -------------------------------- NetPrint.All ----------------------------------
  165.  
  166. /* Print All the section from the current document */
  167. OPTIONS results
  168.  
  169. /*ADDRESS FinalW.1*/
  170.  
  171. GetSectionList ','
  172. SectionList = Result
  173.  
  174. DO WHILE SectionList ~= ''
  175.   PARSE VAR SectionList SectionName ',' SectionList
  176.   CALL NetPrint_test(SectionName)
  177. END
  178.  
  179. EXIT 0
  180.